home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_120831.txt < prev    next >
Text File  |  1990-08-14  |  5KB  |  272 lines
  1. -- card: 120831 from stack: in
  2. -- bmap block id: 121208
  3. -- flags: 4000
  4. -- background id: 69011
  5. -- name: Custom Templates…
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global buttonName,buttonList
  9.   set hilite of background button id buttonName to false
  10.   repeat with index = 1 to the number of lines of buttonList
  11.     set hilite of background button id line index of buttonList to false
  12.   end repeat
  13. end openCard
  14.  
  15. on closeCard
  16.   global buttonName, buttonList
  17.   set hilite of background button id buttonName to true
  18.   repeat with index = 1 to the number of lines of buttonList
  19.     set hilite of background button id line index of buttonList to true
  20.   end repeat
  21. end closeCard
  22.  
  23. on groupOne
  24.   if not hilite of target then
  25.     repeat with index = 2 to 10
  26.       set hilite of button id index to false
  27.     end repeat
  28.     set hilite of target to true
  29.   else
  30.     lock screen
  31.     go to card short name of target
  32.     unlock screen
  33.   end if
  34. end groupOne
  35.  
  36.  
  37. -- part 1 (button)
  38. -- low flags: 00
  39. -- high flags: 0000
  40. -- rect: left=0 top=0 right=343 bottom=513
  41. -- title width / last selected line: 0
  42. -- icon id / first selected line: 0 / 0
  43. -- text alignment: 1
  44. -- font id: 0
  45. -- text size: 12
  46. -- style flags: 0
  47. -- line height: 16
  48. -- part name: 
  49.  
  50.  
  51. -- part 2 (button)
  52. -- low flags: 00
  53. -- high flags: 4000
  54. -- rect: left=95 top=93 right=109 bottom=296
  55. -- title width / last selected line: 0
  56. -- icon id / first selected line: 0 / 0
  57. -- text alignment: 1
  58. -- font id: 0
  59. -- text size: 12
  60. -- style flags: 0
  61. -- line height: 16
  62. -- part name: Attendance Report
  63. ----- HyperTalk script -----
  64. on mouseUp
  65.   groupOne
  66. end mouseUp
  67.  
  68.  
  69.  
  70. -- part 3 (button)
  71. -- low flags: 00
  72. -- high flags: 0000
  73. -- rect: left=95 top=109 right=125 bottom=296
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 0 / 0
  76. -- text alignment: 1
  77. -- font id: 0
  78. -- text size: 12
  79. -- style flags: 0
  80. -- line height: 16
  81. -- part name: 
  82.  
  83.  
  84. -- part 4 (button)
  85. -- low flags: 00
  86. -- high flags: 0000
  87. -- rect: left=95 top=125 right=141 bottom=296
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 0 / 0
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: 
  96.  
  97.  
  98. -- part 5 (button)
  99. -- low flags: 00
  100. -- high flags: 0000
  101. -- rect: left=95 top=141 right=157 bottom=296
  102. -- title width / last selected line: 0
  103. -- icon id / first selected line: 0 / 0
  104. -- text alignment: 1
  105. -- font id: 0
  106. -- text size: 12
  107. -- style flags: 0
  108. -- line height: 16
  109. -- part name: 
  110.  
  111.  
  112. -- part 6 (button)
  113. -- low flags: 00
  114. -- high flags: 0000
  115. -- rect: left=95 top=157 right=173 bottom=296
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: 
  124.  
  125.  
  126. -- part 7 (button)
  127. -- low flags: 00
  128. -- high flags: 0000
  129. -- rect: left=95 top=173 right=189 bottom=296
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: 
  138.  
  139.  
  140. -- part 8 (button)
  141. -- low flags: 00
  142. -- high flags: 0000
  143. -- rect: left=95 top=189 right=205 bottom=296
  144. -- title width / last selected line: 0
  145. -- icon id / first selected line: 0 / 0
  146. -- text alignment: 1
  147. -- font id: 0
  148. -- text size: 12
  149. -- style flags: 0
  150. -- line height: 16
  151. -- part name: 
  152.  
  153.  
  154. -- part 9 (button)
  155. -- low flags: 00
  156. -- high flags: 0000
  157. -- rect: left=95 top=205 right=221 bottom=296
  158. -- title width / last selected line: 0
  159. -- icon id / first selected line: 0 / 0
  160. -- text alignment: 1
  161. -- font id: 0
  162. -- text size: 12
  163. -- style flags: 0
  164. -- line height: 16
  165. -- part name: 
  166.  
  167.  
  168. -- part 10 (button)
  169. -- low flags: 00
  170. -- high flags: 0000
  171. -- rect: left=95 top=221 right=237 bottom=296
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 0
  176. -- text size: 12
  177. -- style flags: 0
  178. -- line height: 16
  179. -- part name: 
  180.  
  181.  
  182. -- part 11 (button)
  183. -- low flags: 00
  184. -- high flags: 2000
  185. -- rect: left=339 top=192 right=208 bottom=417
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 0 / 0
  188. -- text alignment: 1
  189. -- font id: 0
  190. -- text size: 12
  191. -- style flags: 0
  192. -- line height: 16
  193. -- part name: Open
  194. ----- HyperTalk script -----
  195. on mouseUp
  196.   lock screen
  197.   put 2 into index
  198.   repeat until hilite of card button id index
  199.     add 1 to index
  200.   end repeat
  201.   go to card short name of card button id index of this background
  202.   unlock screen
  203. end mouseUp
  204.  
  205.  
  206.  
  207. -- part 12 (button)
  208. -- low flags: 00
  209. -- high flags: 2000
  210. -- rect: left=339 top=217 right=233 bottom=417
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 0 / 0
  213. -- text alignment: 1
  214. -- font id: 0
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: Cancel
  219. ----- HyperTalk script -----
  220. on mouseUp
  221.   lock screen
  222.   pop card
  223.   unlock screen
  224. end mouseUp
  225.  
  226.  
  227.  
  228. -- part contents for background part 28
  229. ----- text -----
  230. Abrosimoff, Mich‚Ķ
  231. Adams, Bryan
  232. Alexander, Rick
  233. Alexander, Susan
  234. Allsop, Blair M.
  235. Azimov, Isaac
  236. Barisoff, Larissa
  237. Bunyan, Paul
  238. Burnyeat, Grant
  239. Caldwell, Brian
  240.  
  241.  
  242.  
  243. -- part contents for background part 29
  244. ----- text -----
  245. 47
  246. 80
  247. 53
  248. 54
  249. 52
  250. 102
  251. 48
  252. 13
  253. 94
  254. 93
  255.  
  256. -- part contents for background part 30
  257. ----- text -----
  258. Present
  259. Present
  260. Present
  261. Present
  262. Present
  263. Present
  264. Present
  265. Present
  266. Present
  267. Present
  268.  
  269.  
  270. -- part contents for background part 33
  271. ----- text -----
  272. 0 students selected